﻿Public Class FRMlistausuario
    Dim listausuario As New LinkedList(Of Login)

    Public Property listausuariototales As LinkedList(Of Login)
        Get
            Return listausuario
        End Get
        Set(ByVal value As LinkedList(Of Login))
            listausuario = value

        End Set
    End Property
    Private Sub FRMlistausuario_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        

        For Each myLogins As Login In listausuario
            Dim item As ListViewItem

            item = Me.lstusuario.Items.Add(New ListViewItem(myLogins.usuariologin))
            item.SubItems.Add(myLogins.IDsusariologin)
            item.SubItems.Add(myLogins.paswordlogin)
            item.SubItems.Add(myLogins.caducidadlogin)
        Next
    End Sub

    Private Sub Label1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Label1.Click

    End Sub
End Class